Адміністрація вирішила продати даний сайт. За детальною інформацією звертайтесь за адресою: rozrahu@gmail.com

Інформація про навчальний заклад

ВУЗ:
Національний університет Львівська політехніка
Інститут:
Не вказано
Факультет:
Комп’ютеризовані системи
Кафедра:
Не вказано

Інформація про роботу

Рік:
2001
Тип роботи:
Лабораторна робота
Предмет:
Алгоритмічні мови та програмування

Частина тексту файла

МІНІСТЕРСТВО ОСВІТИ І НАУКИ УКРАЇНИ НАЦІОНАЛЬНИЙ УНІВЕРСИТЕТ “ЛЬВІВСЬКА ПОЛІТЕХНІКА”   ПРОГРАМИ З РОЗГАЛУЖЕНИМИ ТА ЦИКЛІЧНИМИ АЛГОРИТМАМИ ЛАБОРАТОРНА РОБОТА № 2 : Частина А З КУРСУ “АЛГОРИТМІЧНІ МОВИ І ПРОГРАМУВАННЯ” для студентів спеціальності 6.0914 “Комп’ютеризовані системи, автоматика і управління” Львів – 2001 ПОВНИЙ ТЕКСТ ЗАВДАННЯ 1. Вивчити синтаксис, призначення., принцип роботи і використання операторів мови Турбо-Паскаль та основних процедур введення-виведення. 2. Скласти блок-схеми алгоритмів та програми мовою Турбо-Паскаль для табулювання функцій. Забезпечити ввід значень інтервалу, кроку і похибки табулювання з клавіатури і вивід результатів на дисплей. Дані для роботи беруться з таблиць 1 і 2 за вказівкою викладача: а) табулювання функції (див. табл.1), що вибирається залежно від значення аргументу, на проміжку [а, b] з кроком табуляці h. Таблиця 1 № п/п Функції Умови для вибору функцій Крок, h Інтервал, [a,b]  3   0.2 [4, 6]   ОСТАТОЧНА ВЕРСІЯ БЛОК-СХЕМИ АЛГОРИТМУ y:=1/sin(sqr(x)); i:=i+1;x1[i]:=x;y1[i]:=y; x:=x+h;   y:=x+ln(sqrt(exp(7*ln(x)))); i:=i+1; x1[i]:=x; y1[i]:=y; x:=x+h;   СПИСОК ІДЕНТИФІКАТОРІВ КОНСТАНТ, ЗМІННИХ, ПРОЦЕДУР ТА ФУНКЦІЙ, ВИКОРИСТАНИХ У БЛОК-СХЕМІ АЛГОРИТМУ ПРОГРАМИ СПИСОК : A B X Y I X1 Y1 ПОЯСНЕННЯ ІДЕНТИФІКАТОРІВ ЗМІННИХ : Y – значення функції X – значення аргументу A – ліва крайня межа табулювання B – права крайня межа табулювання I – лічильник X1 – масив для зберігання значень аргументу Y1 – масив для зберігання значень функції ОСТАТОЧНА ВЕРСІЯ ПРОГРАМИ Program Lab_2; uses crt; const h=0.2; a=4; b=6; type y1_1=array[1..10] of real; x1_1=array[1..10] of real; var x,y:real; i:integer; y1:y1_1; x1:x1_1; begin clrscr; x:=a; i:=0; writeln; while x<4.5 do begin y:=1/sin(sqr(x)); i:=i+1; x1[i]:=x; y1[i]:=y; x:=x+h;end; write(' Y Result : X Result : '); writeln; writeln; for I:=1 to i do writeln(' ',y1[i]:4:2,' ...
Антиботан аватар за замовчуванням

22.05.2012 17:05

Коментарі

Ви не можете залишити коментар. Для цього, будь ласка, увійдіть або зареєструйтесь.

Завантаження файлу

Якщо Ви маєте на своєму комп'ютері файли, пов'язані з навчанням( розрахункові, лабораторні, практичні, контрольні роботи та інше...), і Вам не шкода ними поділитись - то скористайтесь формою для завантаження файлу, попередньо заархівувавши все в архів .rar або .zip розміром до 100мб, і до нього невдовзі отримають доступ студенти всієї України! Ви отримаєте грошову винагороду в кінці місяця, якщо станете одним з трьох переможців!
Стань активним учасником руху antibotan!
Поділись актуальною інформацією,
і отримай привілеї у користуванні архівом! Детальніше

Оголошення від адміністратора

Антиботан аватар за замовчуванням

пропонує роботу

Admin

26.02.2019 12:38

Привіт усім учасникам нашого порталу! Хороші новини - з‘явилась можливість кожному заробити на своїх знаннях та вміннях. Тепер Ви можете продавати свої роботи на сайті заробляючи кошти, рейтинг і довіру користувачів. Потрібно завантажити роботу, вказати ціну і додати один інформативний скріншот з деякими частинами виконаних завдань. Навіть одна якісна і всім необхідна робота може продатися сотні разів. «Головою заробляти» продуктивніше ніж руками! :-)

Новини